home *** CD-ROM | disk | FTP | other *** search
/ HPAVC / HPAVC CD-ROM.iso / pc / PRUS101.ZIP / FKBD.DOK < prev    next >
Encoding:
Text File  |  1994-07-20  |  25.4 KB  |  616 lines
  1.                  /////////////////////\\\\\\\\\\\\\\\\\\\\\\\
  2.                        Dokumentation zur FIDO Unit FKBD
  3.                  \\\\\\\\\\\\\\\\\\\\\///////////////////////
  4.  
  5.                                  RELEASE 1.03
  6.                                  ^^^^^^^^^^^^
  7.  
  8.   =========================================================================
  9.   Autor: Orazio Czerwenka, 2:2450/540.55 @ FidoNet, St.Augustin, 13.07.1994
  10.   =========================================================================
  11.  
  12.      1. Ersatzroutinen und Erweiterungen für CRTs Keyboard-Routinen
  13.      --------------------------------------------------------------
  14.  
  15.         Die Unit  FKBD stellt teilweise Ersatzroutinen  für  TPs  Unit
  16.         CRT zur  Verfügung,  sowie  Routinen  zur Funktionserweiterung
  17.         dieser Standardunit hinsichtlich der Benutzung der Tastatur.
  18.  
  19.  
  20.                                !!! WICHTIG !!!
  21.  
  22.         **************************************************************
  23.         Wenn diese Unit overlay-fähig kompiliert werden sollte (s.auch
  24.         FCONDEF.INC), muß sie zu Beginn eines Programmes durch  Aufruf
  25.         der Prozedur (!!!) InitFKBD (!!!) initialisiert werden.
  26.  
  27.         Standardmäßig ist dies nicht der Fall.
  28.  
  29.         Beim gleichzeitigen Gebrauch der Units CRT, FCRT und  FKBD  in
  30.         eigenen Programmen muß in  der  USES-Anweisung  des  Hauptpro-
  31.         grammes unbedingt die folgende Reihenfolge eingehalten werden:
  32.  
  33.         USES
  34.           CRT, FCRT, FKBD;
  35.  
  36.         Wird diese Reihenfolge nicht eingehalten, ist ein  fehlerloses
  37.         Zusammenspiel der in diesen Units enthaltenen Routinen _NICHT_
  38.         gewährleistet.
  39.         **************************************************************
  40.  
  41.  
  42.                     !!! HAFTUNGS- UND GARANTIEAUSSCHLUß !!!
  43.       ┌────────────────────────────────────────────────────────────────┐
  44.       │ Es wird dringend davon abgeraten von in  der  Unit  oder  evtl.│
  45.       │ include files enthaltenen Routinen in eigenen  Programmen  Ge- │
  46.       │ brauch zu machen, wenn diese nicht in der Kurzbeschreibung ge- │
  47.       │ nannt sind.                                                    │
  48.       │                                                                │
  49.       │ Für  die  Richtigkeit  der  Beschreibungen  zu den in der hier │
  50.       │ dokumentierten  Unit  und   evtl.  include  files  enthaltenen │
  51.       │ Routinen wird keine Gewähr gegeben. Fehlerhafte Beschreibungen │
  52.       │ und/oder  ein fehlerhaftes Verhalten  einer Routine, bitte dem │
  53.       │ jeweils  aktuellen  Leiter der  Unit  oder evtl. include files │
  54.       │ melden.                                                        │
  55.       │                                                                │
  56.       │ Die Benutzung der hier vorgestellten Routinen geschieht in je- │
  57.       │ der Hinsicht AUF EIGENE GEFAHR.                                │
  58.       └────────────────────────────────────────────────────────────────┘
  59.  
  60.  
  61.  
  62.      2. Kurzbeschreibung:
  63.      --------------------
  64.  
  65.         Die hier vorgestellten Routinen soweit namens- und  funktions-
  66.         gleich mit denen der TP Standard-Unit CRT werden _nur_ in  der
  67.         Kurzbeschreibung genannt. Nähere Informationen sind dem  Hand-
  68.         buch oder der Online-Hilfe zu entnehmen.
  69.  
  70.         AltPressed .......... liefert zurück,  ob  einer  der ALT-Keys
  71.                               gedrückt wurde
  72.         CapsActive .......... gibt an, ob CAPS eingerastet ist
  73.         CapsPressed ......... gibt an, ob CAPS gedrückt wurde
  74.         Char2Kbd ............ schreibt einen Char in den Tastatur-Puf-
  75.                               fer
  76.         ClrKbd .............. löscht den TastaturPuffer
  77.         CtrlPressed ......... gibt an, ob einer der CTRL-Keys gedrückt
  78.                               wurde
  79.         DisableExtendedKeys . stellt  die CRT-Kompatibilität der Read-
  80.                               und Peek-Routinen sicher
  81.         EnableExtendedKeys .. zum Teufel mit der CRT-Kompatibilität
  82.         EnhancedKbdPresent .. auf 102er-Tastatur prüfen
  83.         ExtendedKeysAllowed . zur Abfrage der CRT-Kompatibilität
  84.         InsActive ........... gibt an, ob die INS-Taste  eingeschaltet
  85.                               ist
  86.         InsPressed .......... gibt an, ob die INS-Taste gedrückt wurde
  87.         KeyPressed .......... RTFM,  jedoch   mit   optionaler  Unter-
  88.                               stützung von ExtendedKeys
  89.         LeftAltPressed ...... gibt an, ob die linke ALT-Taste gedrückt
  90.                               wurde
  91.         LeftCtrlPressed ..... gibt an, ob die linke CTRL-Taste ge-
  92.                               drückt wurde
  93.         LeftShiftPressed .... gibt an, ob die linke SHIFT-Taste ge-
  94.                               drückt wurde
  95.         NumActive ........... gibt an, ob NUM aktiv ist
  96.         NumPressed .......... gibt an, ob NUM gedrückt wurde
  97.         PeekKey ............. liest einen Char aus dem Tastaturpuffer
  98.                               ohne ihn zu löschen
  99.         PeekKeyWord ......... liest ein Word aus dem Tastaturpuffer
  100.                               ohne es zu löschen
  101.         ReadKey ............. RTFM, jedoch mit optionaler Unterstütz-
  102.                               ung von ExtendedKeys
  103.         ReadKeyWord ......... wie ReadKey, liest jedoch gleichzeitig
  104.                               ASCII- und ScanCode-Byte in Form eines
  105.                               Words aus
  106.         RightAltPressed ..... gibt an, ob die rechte ALT-Taste ge-
  107.                               drückt wurde
  108.         RightCtrlPressed .... gibt an, ob die rechte CTRL-Taste ge-
  109.                               drückt wurde
  110.         RightShiftPressed ... gibt an, ob die rechte SHIFT-Taste ge-
  111.                               drückt wurde
  112.         ScrlActive .......... gibt an, ob die SCROLL-Taste aktiv ist
  113.         ScrlPressed ......... gibt an, ob die SCROLL-Taste gedrückt
  114.                               wurde
  115.         ShiftPressed ........ gibt an, ob eine der beiden SHIFT-
  116.                               Tasten gedrückt wurde
  117.         Word2Kbd ............ schreibt ein Word in den Tastaturpuffer
  118.  
  119.  
  120.  
  121.      3. Detaillierte Beschreibung:
  122.      -----------------------------
  123.  
  124.         ===============================================================
  125.         ALTPressed
  126.         ---------------------------------------------------------------
  127.         ERSTAUTOR    ...  Max Maischein, 2:244/1106.17 @ FidoNet
  128.  
  129.         ERSTDATUM    ...  ??.??.199?    LETZTE ÄNDERUNG ...  ??.??.1994
  130.         ---------------------------------------------------------------
  131.  
  132.         BESCHREIBUNG ...  überprüft, ob eine der beiden ALT-Tasten ge-
  133.                           drückt wurde
  134.  
  135.         DEKLARATION  ...  function ALTPressed : Boolean;
  136.  
  137.         ERGEBNIS     ...  TRUE  - ALT-Taste wurde gedrückt
  138.                           FALSE - ALT-Taste wurde nicht gedrückt
  139.  
  140.  
  141.         ===============================================================
  142.         CapsActive
  143.         ---------------------------------------------------------------
  144.         ERSTAUTOR    ...  Max Maischein, 2:244/1106.17 @ FidoNet
  145.  
  146.         ERSTDATUM    ...  ??.??.199?    LETZTE ÄNDERUNG ...  ??.??.1994
  147.         ---------------------------------------------------------------
  148.  
  149.         BESCHREIBUNG ...  überprüft, ob die CAPS-Taste eingerastet ist
  150.  
  151.         DEKLARATION  ...  function CapsActive  : Boolean;
  152.  
  153.         ERGEBNIS     ...  TRUE  - CAPS-Taste ist eingerastet
  154.                           FALSE - CAPS-Taste ist nicht eingerastet
  155.  
  156.  
  157.         ===============================================================
  158.         CapsPressed
  159.         ---------------------------------------------------------------
  160.         ERSTAUTOR    ...  Max Maischein, 2:244/1106.17 @ FidoNet
  161.  
  162.         ERSTDATUM    ...  ??.??.199?    LETZTE ÄNDERUNG ...  ??.??.1994
  163.         ---------------------------------------------------------------
  164.  
  165.         BESCHREIBUNG ...  überprüft, ob die CAPS-Taste gedrückt wurde
  166.  
  167.         DEKLARATION  ...  function CapsPressed : Boolean;
  168.  
  169.         ERGEBNIS     ...  TRUE  - CAPS-Taste wurde gedrückt
  170.                           FALSE - CAPS-Taste wurde nicht gedrückt
  171.  
  172.  
  173.         ===============================================================
  174.         Char2KBD
  175.         ---------------------------------------------------------------
  176.         ERSTAUTOR    ...  Borland
  177.  
  178.         ERSTDATUM    ...  ??.??.199?    LETZTE ÄNDERUNG ...  05.01.1994
  179.  
  180.         MODIFIKATION ...  Orazio Czerwenka
  181.         ---------------------------------------------------------------
  182.  
  183.         BESCHREIBUNG ...  schreibt den ASCII und ScanCode eines Chars
  184.                           in den Tastaturpuffer
  185.  
  186.         DEKLARATION  ...  procedure Char2KBD (ch:char;code:byte);
  187.  
  188.         PARAMETER    ...  ch   - der zu schreibende Char, #0 für exten-
  189.                                  ded keys
  190.                           code - 0 für normale ASCIIs, ansonsten der
  191.                                  ScanCode eines extended keys
  192.  
  193.  
  194.         ===============================================================
  195.         ClrKBD
  196.         ---------------------------------------------------------------
  197.         ERSTAUTOR    ...  Borland
  198.  
  199.         ERSTDATUM    ...  ??.??.199?    LETZTE ÄNDERUNG ...  01.07.1994
  200.  
  201.         MODIFIKATION ...  Orazio Czerwenka
  202.         ---------------------------------------------------------------
  203.  
  204.         BESCHREIBUNG ...  löscht den Tastaturpuffer
  205.  
  206.         DEKLARATION  ...  procedure ClrKBD;
  207.  
  208.  
  209.         ===============================================================
  210.         CtrlPressed
  211.         ---------------------------------------------------------------
  212.         ERSTAUTOR    ...  Max Maischein, 2:244/1106.17 @ FidoNet
  213.  
  214.         ERSTDATUM    ...  ??.??.199?    LETZTE ÄNDERUNG ...  ??.??.199?
  215.         ---------------------------------------------------------------
  216.  
  217.         BESCHREIBUNG ...  gibt an, ob eine der beiden CTRL-Tasten ge-
  218.                           drückt wurde
  219.  
  220.         DEKLARATION  ...  function CtrlPressed : Boolean;
  221.  
  222.         ERGEBNIS     ...  TRUE  - CTRL-Taste wurde gedrückt
  223.                           FALSE - CTRL-Taste wurde nicht gedrückt
  224.  
  225.  
  226.         ===============================================================
  227.         DisableExtendedKeys
  228.         ---------------------------------------------------------------
  229.         ERSTAUTOR    ...  Orazio Czerwenka, 2:2450/540.55 @ FidoNet
  230.  
  231.         ERSTDATUM    ...  01.07.1994    LETZTE ÄNDERUNG ...  01.07.1994
  232.         ---------------------------------------------------------------
  233.  
  234.         BESCHREIBUNG ...  stellt die CRT-Kompatibilität der Read- und
  235.                           Peek-Routinen sicher
  236.  
  237.         DEKLARATION  ...  procedure DisableExtendedKeys;
  238.  
  239.  
  240.         ===============================================================
  241.         EnableExtendedKeys
  242.         ---------------------------------------------------------------
  243.         ERSTAUTOR    ...  Orazio Czerwenka, 2:2450/540.55 @ FidoNet
  244.  
  245.         ERSTDATUM    ...  01.07.1994    LETZTE ÄNDERUNG ...  01.07.1994
  246.         ---------------------------------------------------------------
  247.  
  248.         BESCHREIBUNG ...  verzichtet auf CRT-Kompatibilität zugunsten
  249.                           einer Unterstützung der MFII-Tastatur-Scan-
  250.                           Codes (zB F11/F12), die nicht mit denen der
  251.                           normalen XT-Tastatur übereinstimmen
  252.  
  253.         DEKLARATION  ...  procedure EnableExtendedKeys;
  254.  
  255.  
  256.         ===============================================================
  257.         EnhancedKBDPresent
  258.         ---------------------------------------------------------------
  259.         ERSTAUTOR    ...  Max Maischein, 2:244/1106.17 @ FidoNet
  260.  
  261.         ERSTDATUM    ...  ??.??.19??    LETZTE ÄNDERUNG ...  01.07.1994
  262.  
  263.         MODIFIKATION ...  Orazio Czerwenka
  264.         ---------------------------------------------------------------
  265.  
  266.         BESCHREIBUNG ...  überprüft, ob eine erweiterte Tastatur zur
  267.                           Verfügung steht
  268.  
  269.         DEKLARATION  ...  function  EnhancedKBDPresent : Boolean;
  270.  
  271.         ERGEBNIS     ...  TRUE  - erweiterte Tastatur
  272.                           FALSE - keine erweiterte Tastatur
  273.  
  274.  
  275.         ===============================================================
  276.         ExtendedKeysAllowed
  277.         ---------------------------------------------------------------
  278.         ERSTAUTOR    ...  Orazio Czerwenka, 2:2450/540.55 @ FidoNet
  279.  
  280.         ERSTDATUM    ...  01.07.1994    LETZTE ÄNDERUNG ...  01.07.1994
  281.         ---------------------------------------------------------------
  282.  
  283.         BESCHREIBUNG ...  überprüft, ob für die Read- und Peek-Routinen
  284.                           extended key support zur Verfügung gestellt
  285.                           wurde
  286.  
  287.         DEKLARATION  ...  function  ExtendedKeysAllowed : Boolean;
  288.  
  289.         ERGEBNIS     ...  TRUE  - extended key support, nicht CRT-kom-
  290.                                   patibel
  291.                           FALSE - kein extended key support, somit
  292.                                   CRT-kompatibel
  293.  
  294.  
  295.         ===============================================================
  296.         InsActive
  297.         ---------------------------------------------------------------
  298.         ERSTAUTOR    ...  Max Maischein, 2:244/1106.17 @ FidoNet
  299.  
  300.         ERSTDATUM    ...  ??.??.19??    LETZTE ÄNDERUNG ...  ??.??.19??
  301.         ---------------------------------------------------------------
  302.  
  303.         BESCHREIBUNG ...  überprüft, ob der INS-Key aktiv ist
  304.  
  305.         DEKLARATION  ...  function  InsActive : Boolean;
  306.  
  307.         ERGEBNIS     ...  TRUE  - INS-Key aktiv
  308.                           FALSE - INS-Key nicht aktiv
  309.  
  310.  
  311.         ===============================================================
  312.         InsPressed
  313.         ---------------------------------------------------------------
  314.         ERSTAUTOR    ...  Max Maischein, 2:244/1106.17 @ FidoNet
  315.  
  316.         ERSTDATUM    ...  ??.??.19??    LETZTE ÄNDERUNG ...  ??.??.19??
  317.         ---------------------------------------------------------------
  318.  
  319.         BESCHREIBUNG ...  überprüft, ob der INS-Key gedrückt wurde
  320.  
  321.         DEKLARATION  ...  function  InsPressed : Boolean;
  322.  
  323.         ERGEBNIS     ...  TRUE  - INS-Key wurde gedrückt
  324.                           FALSE - INS-Key wurde nicht gedrückt
  325.  
  326.  
  327.         ===============================================================
  328.         LeftAltPressed
  329.         ---------------------------------------------------------------
  330.         ERSTAUTOR    ...  Orazio Czerwenka, 2:2450/540.55 @ FidoNet
  331.  
  332.         ERSTDATUM    ...  03.07.1994    LETZTE ÄNDERUNG ...  03.07.1994
  333.         ---------------------------------------------------------------
  334.  
  335.         BESCHREIBUNG ...  überprüft, ob die linke ALT-Taste gedrückt
  336.                           wurde
  337.  
  338.         DEKLARATION  ...  function  LeftAltPressed : Boolean;
  339.  
  340.         ERGEBNIS     ...  TRUE  - linke ALT-Taste wurde gedrückt
  341.                           FALSE - linke ALT-Taste wurde nicht gedrückt
  342.  
  343.  
  344.         ===============================================================
  345.         LeftCtrlPressed
  346.         ---------------------------------------------------------------
  347.         ERSTAUTOR    ...  Orazio Czerwenka, 2:2450/540.55 @ FidoNet
  348.  
  349.         ERSTDATUM    ...  03.07.1994    LETZTE ÄNDERUNG ...  03.07.1994
  350.         ---------------------------------------------------------------
  351.  
  352.         BESCHREIBUNG ...  überprüft, ob die linke CTRL-Taste gedrückt
  353.                           wurde
  354.  
  355.         DEKLARATION  ...  function  LeftCtrlPressed : Boolean;
  356.  
  357.         ERGEBNIS     ...  TRUE  - linke CTRL-Taste wurde gedrückt
  358.                           FALSE - linke CTRL-Taste wurde nicht gedrückt
  359.  
  360.  
  361.         ===============================================================
  362.         LeftShiftPressed
  363.         ---------------------------------------------------------------
  364.         ERSTAUTOR    ...  Orazio Czerwenka, 2:2450/540.55 @ FidoNet
  365.  
  366.         ERSTDATUM    ...  03.07.1994    LETZTE ÄNDERUNG ...  03.07.1994
  367.         ---------------------------------------------------------------
  368.  
  369.         BESCHREIBUNG ...  überprüft, ob die linke SHIFT-Taste gedrückt
  370.                           wurde
  371.  
  372.         DEKLARATION  ...  function  LeftShiftPressed : Boolean;
  373.  
  374.         ERGEBNIS     ...  TRUE  - linke SHIFT-Taste wurde gedrückt
  375.                           FALSE - linke SHIFT-Taste wurde nicht
  376.                                   gedrückt
  377.  
  378.  
  379.         ===============================================================
  380.         NumActive
  381.         ---------------------------------------------------------------
  382.         ERSTAUTOR    ...  Max Maischein, 2:244/1106.17 @ FidoNet
  383.  
  384.         ERSTDATUM    ...  ??.??.19??    LETZTE ÄNDERUNG ...  ??.??.19??
  385.         ---------------------------------------------------------------
  386.  
  387.         BESCHREIBUNG ...  überprüft, ob NUM-Key aktiv ist
  388.  
  389.         DEKLARATION  ...  function  NumActive : Boolean;
  390.  
  391.         ERGEBNIS     ...  TRUE  - NUM-Key ist aktiv
  392.                           FALSE - NUM-Key ist nicht aktiv
  393.  
  394.  
  395.         ===============================================================
  396.         NumPressed
  397.         ---------------------------------------------------------------
  398.         ERSTAUTOR    ...  Max Maischein, 2:244/1106.17 @ FidoNet
  399.  
  400.         ERSTDATUM    ...  ??.??.19??    LETZTE ÄNDERUNG ...  ??.??.19??
  401.         ---------------------------------------------------------------
  402.  
  403.         BESCHREIBUNG ...  überprüft, ob NUM-Key gedrückt wurde
  404.  
  405.         DEKLARATION  ...  function  NumPressed : Boolean;
  406.  
  407.         ERGEBNIS     ...  TRUE  - NUM-Key wurde gedrückt
  408.                           FALSE - NUM-Key wurde nicht gedrückt
  409.  
  410.  
  411.         ===============================================================
  412.         PeekKey
  413.         ---------------------------------------------------------------
  414.         ERSTAUTOR    ...  Martin Austermeier, 2:2407/109.15 @ FidoNet
  415.  
  416.         ERSTDATUM    ...  ??.??.19??    LETZTE ÄNDERUNG ...  03.07.1994
  417.  
  418.         MODIFIKATION ...  Orazio Czerwenka
  419.         ---------------------------------------------------------------
  420.  
  421.         BESCHREIBUNG ...  liest einen Char aus dem Tastaturpuffer, ohne
  422.                           ihn dort zu entfernen
  423.  
  424.         DEKLARATION  ...  function  PeekKey : Char;
  425.  
  426.         ERGEBNIS     ...  der nächste Char des Tastaturpuffers
  427.  
  428.  
  429.         ===============================================================
  430.         PeekKeyWord
  431.         ---------------------------------------------------------------
  432.         ERSTAUTOR    ...  Martin Austermeier, 2:2407/109.15 @ FidoNet
  433.  
  434.         ERSTDATUM    ...  ??.??.19??    LETZTE ÄNDERUNG ...  03.07.1994
  435.  
  436.         MODIFIKATION ...  Orazio Czerwenka
  437.         ---------------------------------------------------------------
  438.  
  439.         BESCHREIBUNG ...  liest ein Word aus dem Tastaturpuffer, ohne
  440.                           ihn dort zu entfernen
  441.  
  442.         DEKLARATION  ...  function  PeekKeyWord: Word;
  443.  
  444.         ERGEBNIS     ...  das nächste Word des Tastaturpuffers
  445.  
  446.  
  447.         ===============================================================
  448.         ReadKeyWord
  449.         ---------------------------------------------------------------
  450.         ERSTAUTOR    ...  Martin Austermeier, 2:2407/109.15 @ FidoNet
  451.  
  452.         ERSTDATUM    ...  ??.??.19??    LETZTE ÄNDERUNG ...  01.07.1994
  453.  
  454.         MODIFIKATION ...  Orazio Czerwenka
  455.         ---------------------------------------------------------------
  456.  
  457.         BESCHREIBUNG ...  funktionsgleich zu ReadKey, liest jedoch ein
  458.                           Word statt eines Chars aus dem Tastaturpuffer
  459.                           und entfernt es von dort
  460.  
  461.         DEKLARATION  ...  function  ReadKeyWord: Word;
  462.  
  463.         ERGEBNIS     ...  das nächste Word des Tastaturpuffers
  464.  
  465.  
  466.         ===============================================================
  467.         RightAltPressed
  468.         ---------------------------------------------------------------
  469.         ERSTAUTOR    ...  Orazio Czerwenka, 2:2450/540.55 @ FidoNet
  470.  
  471.         ERSTDATUM    ...  03.07.1994    LETZTE ÄNDERUNG ...  03.07.1994
  472.         ---------------------------------------------------------------
  473.  
  474.         BESCHREIBUNG ...  überprüft, ob die rechte ALT-Taste gedrückt
  475.                           wurde
  476.  
  477.         DEKLARATION  ...  function  RightAltPressed : Boolean;
  478.  
  479.         ERGEBNIS     ...  TRUE  - rechte ALT-Taste wurde gedrückt
  480.                           FALSE - rechte ALT-Taste wurde nicht gedrückt
  481.  
  482.  
  483.         ===============================================================
  484.         RightCtrlPressed
  485.         ---------------------------------------------------------------
  486.         ERSTAUTOR    ...  Orazio Czerwenka, 2:2450/540.55 @ FidoNet
  487.  
  488.         ERSTDATUM    ...  03.07.1994    LETZTE ÄNDERUNG ...  03.07.1994
  489.         ---------------------------------------------------------------
  490.  
  491.         BESCHREIBUNG ...  überprüft, ob die rechte CTRL-Taste gedrückt
  492.                           wurde
  493.  
  494.         DEKLARATION  ...  function  RightCtrlPressed : Boolean;
  495.  
  496.         ERGEBNIS     ...  TRUE  - rechte CTRL-Taste wurde gedrückt
  497.                           FALSE - rechte CTRL-Taste wurde nicht
  498.                                   gedrückt
  499.  
  500.  
  501.         ===============================================================
  502.         RightShiftPressed
  503.         ---------------------------------------------------------------
  504.         ERSTAUTOR    ...  Orazio Czerwenka, 2:2450/540.55 @ FidoNet
  505.  
  506.         ERSTDATUM    ...  03.07.1994    LETZTE ÄNDERUNG ...  03.07.1994
  507.         ---------------------------------------------------------------
  508.  
  509.         BESCHREIBUNG ...  überprüft, ob die rechte SHIFT-Taste gedrückt
  510.                           wurde
  511.  
  512.         DEKLARATION  ...  function  RightShiftPressed : Boolean;
  513.  
  514.         ERGEBNIS     ...  TRUE  - rechte SHIFT-Taste wurde gedrückt
  515.                           FALSE - rechte SHIFT-Taste wurde nicht
  516.                                   gedrückt
  517.  
  518.  
  519.         ===============================================================
  520.         ScrlActive
  521.         ---------------------------------------------------------------
  522.         ERSTAUTOR    ...  Max Maischein, 2:244/1106.17 @ FidoNet
  523.  
  524.         ERSTDATUM    ...  ??.??.19??    LETZTE ÄNDERUNG ...  ??.??.19??
  525.         ---------------------------------------------------------------
  526.  
  527.         BESCHREIBUNG ...  überprüft, ob SCROLL-Key aktiv ist
  528.  
  529.         DEKLARATION  ...  function  ScrlActive : Boolean;
  530.  
  531.         ERGEBNIS     ...  TRUE  - SCROLL-Key ist aktiv
  532.                           FALSE - SCROLL-Key ist nicht aktiv
  533.  
  534.  
  535.         ===============================================================
  536.         ScrlPressed
  537.         ---------------------------------------------------------------
  538.         ERSTAUTOR    ...  Max Maischein, 2:244/1106.17 @ FidoNet
  539.  
  540.         ERSTDATUM    ...  ??.??.19??    LETZTE ÄNDERUNG ...  ??.??.19??
  541.         ---------------------------------------------------------------
  542.  
  543.         BESCHREIBUNG ...  überprüft, ob SCROLL-Key gedrückt wurde
  544.  
  545.         DEKLARATION  ...  function  ScrlPressed : Boolean;
  546.  
  547.         ERGEBNIS     ...  TRUE  - SCROLL-Key wurde gedrückt
  548.                           FALSE - SCROLL-Key wurde nicht gedrückt
  549.  
  550.  
  551.         ===============================================================
  552.         ShiftPressed
  553.         ---------------------------------------------------------------
  554.         ERSTAUTOR    ...  Orazio Czerwenka, 2:2450/540 @ FidoNet
  555.  
  556.         ERSTDATUM    ...  03.07.1994    LETZTE ÄNDERUNG ...  03.07.1994
  557.         ---------------------------------------------------------------
  558.  
  559.         BESCHREIBUNG ...  überprüft, ob eine der beiden SHIFT-Tasten
  560.                           gedrückt wurde
  561.  
  562.         DEKLARATION  ...  function  ShiftPressed : Boolean;
  563.  
  564.         ERGEBNIS     ...  TRUE  - SHIFT wurde gedrückt
  565.                           FALSE - SHIFT wurde nicht gedrückt
  566.  
  567.  
  568.         ===============================================================
  569.         Word2KBD
  570.         ---------------------------------------------------------------
  571.         ERSTAUTOR    ...  Borland
  572.  
  573.         ERSTDATUM    ...  ??.??.199?    LETZTE ÄNDERUNG ...  03.07.1994
  574.  
  575.         MODIFIKATION ...  Orazio Czerwenka
  576.         ---------------------------------------------------------------
  577.  
  578.         BESCHREIBUNG ...  schreibt den ASCII und ScanCode eines Chars
  579.                           als Word in den Tastaturpuffer
  580.  
  581.         DEKLARATION  ...  procedure Word2KBD (w:Word);
  582.  
  583.         PARAMETER    ...  w - ein Word, das den ASCII und Scancode
  584.                               eines Chars als Lo und Hi enthält
  585.  
  586.  
  587.  
  588.  
  589.      4. Beispiele:
  590.      -------------
  591.  
  592.         ===============================================================
  593.         
  594.         ---------------------------------------------------------------
  595.  
  596.         Die Beispiele zum sinnvollen Gebrauch der  hier  dokumentierten
  597.         Routinen werden zu einem späteren Zeitpunkt nachgereicht.
  598.         Aus Zeitgründen konnte dieser Teil der Dokumentation  vorläufig
  599.         nicht realisiert werden.
  600.  
  601.         Wer Anwendungsbeispiele zu der ein  oder  anderen  hier  vorge-
  602.         stellten Routine zur Dokumentation beitragen  oder die  weitere
  603.         Bearbeitung der Dokumentationsdatei dieser  Unit  in  Zusammen-
  604.         arbeit mit dem jeweiligen Leiter  dieser  Unit übernehmen, bzw.
  605.         diese  in  andere Sprachen übersetzen möchte, ist herzlich ein-
  606.         geladen, sich per NM bei diesem zu melden.
  607.  
  608.  
  609.  
  610.  
  611.   ==========================================================================
  612.  
  613.                  //////////////////////\\\\\\\\\\\\\\\\\\\\\\\
  614.                    Ende der Dokumentation zur FIDO Unit FKB
  615.                  \\\\\\\\\\\\\\\\\\\\\\///////////////////////
  616.